home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 January / PCWorld_2007-01_cd.bin / v cisle / autoit / autoit-v3.2.0.1-setup.exe / Examples / count-do.au3 < prev    next >
Encoding:
Text File  |  2006-06-20  |  908 b   |  38 lines
  1. ;
  2. ; AutoIt Version: 3.0
  3. ; Language:       English
  4. ; Platform:       Win9x/NT
  5. ; Author:         Jonathan Bennett (jon at hiddensoft com)
  6. ;
  7. ; Script Function:
  8. ;   Counts to 5 using a "do" loop
  9.  
  10.  
  11. ; Prompt the user to run the script - use a Yes/No prompt (4 - see help file)
  12. $answer = MsgBox(4, "AutoIt Example", "This script will count to 5 using a 'Do' loop.  Run?")
  13.  
  14.  
  15. ; Check the user's answer to the prompt (see the help file for MsgBox return values)
  16. ; If "No" was clicked (7) then exit the script
  17. If $answer = 7 Then
  18.     MsgBox(0, "AutoIt Example", "OK.  Bye!")
  19.     Exit
  20. EndIf
  21.  
  22.  
  23. ; Set the counter
  24. $count = 1
  25.  
  26. ; Execute the loop "until" the counter is greater than 5
  27. Do
  28.     ; Print the count
  29.     MsgBox(0, "AutoIt Example", "Count is: " & $count)
  30.  
  31.     ; Increase the count by one
  32.     $count = $count + 1  
  33.  
  34. Until $count > 5
  35.         
  36.         
  37. ; Finished!
  38. MsgBox(0, "AutoIt Example", "Finished!")